/* bzflag
 * Copyright (c) 1993-2020 Tim Riker
 *
 * This package is free software;  you can redistribute it and/or
 * modify it under the terms of the license found in the file
 * named COPYING that should have accompanied this file.
 *
 * THIS PACKAGE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
 */

/* interface header */
#include "FormatMenu.h"

/* common implementation headers */
#include "BzfDisplay.h"
#include "ErrorHandler.h"
#include "FontManager.h"

/* local implementation headers */
#include "MainMenu.h"
#include "playing.h"
#include "HUDui.h"

const int       FormatMenu::NumReadouts = 4;
const int       FormatMenu::NumItems = 30;
const int       FormatMenu::NumColumns = 3;

bool FormatMenuDefaultKey::keyPress(const BzfKeyEvent& key)
{
    if (key.ascii == 0) switch (key.button)
        {
        case BzfKeyEvent::Up:
            if (HUDui::getFocus())
                menu->setSelected(menu->getSelected() - 1);
            return true;

        case BzfKeyEvent::Down:
            if (HUDui::getFocus())
                menu->setSelected(menu->getSelected() + 1);
            return true;

        case BzfKeyEvent::PageUp:
            if (HUDui::getFocus())
                menu->setSelected(menu->getSelected() - FormatMenu::NumItems);
            return true;

        case BzfKeyEvent::PageDown:
            if (HUDui::getFocus())
                menu->setSelected(menu->getSelected() + FormatMenu::NumItems);
            return true;
        }

    else if (key.ascii == '\t')
    {
        if (HUDui::getFocus())
            menu->setSelected(menu->getSelected() + 1);
        return true;
    }

    else if (key.ascii == 'T' || key.ascii == 't')
    {
        menu->setFormat(true);
        return true;
    }
    return MenuDefaultKey::keyPress(key);
}

bool FormatMenuDefaultKey::keyRelease(const BzfKeyEvent& key)
{
    switch (key.button)
    {
    case BzfKeyEvent::Up:
    case BzfKeyEvent::Down:
    case BzfKeyEvent::PageUp:
    case BzfKeyEvent::PageDown:
        return true;
    }
    switch (key.ascii)
    {
    case 27:    // escape
    case 13:    // return
    case 'T':
    case 't':
        return true;
    }
    return MenuDefaultKey::keyRelease(key);
}

FormatMenu::FormatMenu() : defaultKey(this), badFormats(NULL)
{
    int i;

    BzfDisplay* display = getDisplay();
    numFormats = display->getNumResolutions();
    badFormats = new bool[numFormats];
    for (i = 0; i < numFormats; i++)
        badFormats[i] = false;

    // add controls
    addLabel("Video Format", "");
    addLabel("", "");         // instructions
    addLabel("", "Current Format:");  // current format readout
    addLabel("", "");         // page readout
    currentLabel = (HUDuiLabel*)(getControls()[NumReadouts - 2]);
    pageLabel = (HUDuiLabel*)(getControls()[NumReadouts - 1]);

    // add resolution list items
    for (i = 0; i < NumItems; ++i)
        addLabel("", "");

    // fill in static labels
    if (numFormats < 2)
    {
        currentLabel->setString("<switching not available>");
        setFocus(NULL);
    }
    else
    {
        HUDuiLabel* label = (HUDuiLabel*)(getControls()[NumReadouts - 3]);
        label->setString("Press Enter to select and T to test a format. Esc to exit.");
        setFocus(pageLabel);
    }
}

FormatMenu::~FormatMenu()
{
    delete[] badFormats;
}

void FormatMenu::addLabel(const char* msg, const char* _label)
{
    HUDuiLabel* label = new HUDuiLabel;
    label->setFontFace(MainMenu::getFontFace());
    label->setString(msg);
    label->setLabel(_label);
    getControls().push_back(label);
}

int FormatMenu::getSelected() const
{
    return selectedIndex;
}

void FormatMenu::setSelected(int index)
{
    BzfDisplay* display = getDisplay();
    std::vector<HUDuiControl*>& listHUD = getControls();

    // clamp index
    if (index < 0)
        index = numFormats - 1;
    else if (index != 0 && index >= numFormats)
        index = 0;

    // ignore if no change
    if (selectedIndex == index)
        return;

    // update current format
    currentLabel->setString(display->getResolution(display->getResolution())->name);

    // update selected index and get old and new page numbers
    const int oldPage = (selectedIndex < 0) ? -1 : (selectedIndex / NumItems);
    selectedIndex = index;
    const int newPage = (selectedIndex / NumItems);

    // if page changed then load items for this page
    if (oldPage != newPage)
    {
        // fill items
        const int base = newPage * NumItems;
        for (int i = 0; i < NumItems; ++i)
        {
            HUDuiLabel* label = (HUDuiLabel*)listHUD[i + NumReadouts];
            if (base + i < numFormats)
                if (badFormats[base + i])
                    label->setString("<unloadable>");
                else
                    label->setString(display->getResolution(base + i)->name);
            else
                label->setString("");
        }

        // change page label
        if (numFormats > NumItems)
        {
            char msg[50];
            std::vector<std::string> args;
            sprintf(msg, "%d", newPage + 1);
            args.push_back(msg);
            sprintf(msg, "%d", (numFormats + NumItems - 1) / NumItems);
            args.push_back(msg);
            pageLabel->setString("Page {1} of {2}", &args);
        }
    }

    // set focus to selected item
    if (numFormats > 0)
    {
        const int indexOnPage = selectedIndex % NumItems;
        getControls()[NumReadouts + indexOnPage]->setFocus();
    }
    else
        setFocus(NULL);
}

void FormatMenu::show()
{
    pageLabel->setString("");
    selectedIndex = -1;
    setSelected(getDisplay()->getResolution());
}

void FormatMenu::execute()
{
    setFormat(false);
}

void FormatMenu::setFormat(bool test)
{
    if (selectedIndex >= numFormats || badFormats[selectedIndex])
        return;

    if (!setVideoFormat(selectedIndex, test))
    {
        // can't load format
        badFormats[selectedIndex] = true;
    }
    else if (!test)
    {
        // print OpenGL renderer, which might have changed
        printError((const char*)glGetString(GL_RENDERER));
    }

    // update readouts
    const int oldSelectedIndex = selectedIndex;
    selectedIndex = -1;
    setSelected(oldSelectedIndex);
}

void FormatMenu::resize(int _width, int _height)
{
    HUDDialog::resize(_width, _height);

    // use a big font for title, smaller font for the rest
    const float titleFontSize = (float)_height / 15.0f;
    FontManager &fm = FontManager::instance();
    int fontFace = MainMenu::getFontFace();

    // reposition title
    float x, y;
    std::vector<HUDuiControl*>& listHUD = getControls();
    {
        HUDuiLabel* title = (HUDuiLabel*)listHUD[0];
        title->setFontSize(titleFontSize);
        const float titleWidth = fm.getStrLength(fontFace, titleFontSize, title->getString());
        const float titleHeight = fm.getStrHeight(fontFace, titleFontSize, " ");
        x = 0.5f * ((float)_width - titleWidth);
        y = (float)_height - titleHeight;
        title->setPosition(x, y);
    }

    // reposition test and current format messages
    float fontSize = (float)_height / 54.0f;
    {
        HUDuiLabel* label = (HUDuiLabel*)listHUD[1];
        label->setFontSize(fontSize);
        const float stringWidth = fm.getStrLength(fontFace, fontSize, label->getString());
        x = 0.5f * ((float)_width - stringWidth);
        y -= 1.5f * fm.getStrHeight(fontFace, fontSize, " ");
        label->setPosition(x, y);
    }
    {
        HUDuiLabel* label = currentLabel;
        label->setFontSize(fontSize);
        y -= 1.0f * fm.getStrHeight(fontFace, fontSize, " ");
        label->setPosition(0.5f * (float)_width, y);
    }

    // position page readout
    fontSize = (float)_height / 54.0f;
    {
        HUDuiLabel* label = pageLabel;
        label->setFontSize(fontSize);
        const float stringWidth = fm.getStrLength(fontFace, fontSize, label->getString());
        x = 0.5f * ((float)_width - stringWidth);
        y -= 2.0f * fm.getStrHeight(fontFace, fontSize, " ");
        label->setPosition(x, y);
    }

    // position format item list
    const float yBase = y;
    int lastColumn = -1;
    for (int i = 0; i < NumItems; ++i)
    {
        const int column = i * NumColumns / NumItems;
        if (column != lastColumn)
        {
            lastColumn = column;
            x = (float)_width * ((0.5f + (float)column) / (float)(NumColumns + 1));
            y = yBase;
        }

        HUDuiLabel* label = (HUDuiLabel*)listHUD[i + NumReadouts];
        label->setFontSize(fontSize);
        y -= 1.0f * fm.getStrHeight(fontFace, fontSize, " ");
        label->setPosition(x, y);
    }
}


// Local Variables: ***
// mode: C++ ***
// tab-width: 4 ***
// c-basic-offset: 4 ***
// indent-tabs-mode: nil ***
// End: ***
// ex: shiftwidth=4 tabstop=4
